home *** CD-ROM | disk | FTP | other *** search
- ;/* FuelGauge Example
- sc link fuelgaugeexample.c lib lib:classact.lib
- quit
- */
-
- /* system includes
- */
- #include <stdio.h>
- #include <stdlib.h>
- #include <string.h>
-
- #include <exec/types.h>
- #include <exec/memory.h>
- #include <intuition/intuition.h>
- #include <intuition/gadgetclass.h>
- #include <graphics/gfxbase.h>
- #include <graphics/text.h>
- #include <graphics/gfxmacros.h>
- #include <utility/tagitem.h>
- #include <workbench/startup.h>
- #include <workbench/workbench.h>
-
- #include <proto/intuition.h>
- #include <proto/graphics.h>
- #include <proto/exec.h>
- #include <proto/dos.h>
- #include <proto/utility.h>
- #include <proto/wb.h>
- #include <proto/icon.h>
-
- /* ClassAct includes
- */
- #include <classact.h>
-
-
- enum
- {
- GID_GAUGE=0,
- GID_DOWN,
- GID_UP,
- GID_QUIT,
- GID_LAST
- };
-
- enum
- {
- WID_MAIN=0,
- WID_LAST
- };
-
- enum
- {
- OID_MAIN=0,
- OID_LAST
- };
-
- #define FMIN 0
- #define FMAX 100
-
- int main(void)
- {
- struct MsgPort *AppPort;
-
- struct Window *windows[WID_LAST];
-
- struct Gadget *gadgets[GID_LAST];
-
- Object *objects[OID_LAST];
-
- /* make sure our classes opened... */
- if (!ButtonBase || !FuelGaugeBase || !WindowBase || !LayoutBase)
- return(30);
- else if ( AppPort = CreateMsgPort() )
- {
- /* Create the window object.
- */
- objects[OID_MAIN] = WindowObject,
- WA_ScreenTitle, "ClassAct Release 2.0",
- WA_Title, "ClassAct FuelGauge Example",
- WA_Activate, TRUE,
- WA_DepthGadget, TRUE,
- WA_DragBar, TRUE,
- WA_CloseGadget, TRUE,
- WA_SizeGadget, TRUE,
- WINDOW_IconifyGadget, TRUE,
- WINDOW_IconTitle, "FuelGauge",
- WINDOW_AppPort, AppPort,
- WINDOW_Position, WPOS_CENTERMOUSE,
- WINDOW_ParentGroup, VGroupObject,
- LAYOUT_SpaceOuter, TRUE,
- LAYOUT_DeferLayout, TRUE,
-
- LAYOUT_AddChild, gadgets[GID_GAUGE] = FuelGaugeObject,
- GA_ID, GID_GAUGE,
- FUELGAUGE_Orientation, FGORIENT_HORIZ,
- FUELGAUGE_Min, FMIN,
- FUELGAUGE_Max, FMAX,
- FUELGAUGE_Level, 0,
- FUELGAUGE_Percent, TRUE,
- FUELGAUGE_TickSize, 5,
- FUELGAUGE_Ticks, 5,
- FUELGAUGE_ShortTicks, TRUE,
- FuelGaugeEnd,
-
- LAYOUT_AddChild, VGroupObject,
- CLASSACT_BackFill, NULL,
- LAYOUT_SpaceOuter, TRUE,
- LAYOUT_VertAlignment, LALIGN_CENTER,
- LAYOUT_HorizAlignment, LALIGN_CENTER,
- LAYOUT_BevelStyle, BVS_FIELD,
-
- LAYOUT_AddImage, LabelObject,
- LABEL_Text, "The fuelgauge supports optional tickmarks as\n",
- LABEL_Text, "well as vertical and horizontal orientation.\n",
- LABEL_Text, " \n",
- LABEL_Text, "You can set the min/max range, as well as\n",
- LABEL_Text, "options such as varargs ascii display,\n",
- LABEL_Text, "percentage display, and custom pen selection.\n",
- LabelEnd,
- LayoutEnd,
-
-
- LAYOUT_AddChild, HGroupObject,
- LAYOUT_SpaceOuter, FALSE,
- LAYOUT_EvenSize, TRUE,
-
- LAYOUT_AddChild, ButtonObject,
- GA_ID, GID_DOWN,
- GA_RelVerify, TRUE,
- GA_Text,"_Down",
- ButtonEnd,
-
- LAYOUT_AddChild, ButtonObject,
- GA_ID, GID_UP,
- GA_RelVerify, TRUE,
- GA_Text,"_Up",
- ButtonEnd,
-
- LAYOUT_AddChild, ButtonObject,
- GA_ID, GID_QUIT,
- GA_RelVerify, TRUE,
- GA_Text,"_Quit",
- ButtonEnd,
- LayoutEnd,
- CHILD_WeightedHeight, 0,
-
- EndGroup,
- EndWindow;
-
- /* Object creation sucessful?
- */
- if (objects[OID_MAIN])
- {
- /* Open the window.
- */
- if (windows[WID_MAIN] = (struct Window *) CA_OpenWindow(objects[OID_MAIN]))
- {
- ULONG wait, signal, app = (1L << AppPort->mp_SigBit);
- ULONG done = FALSE;
- ULONG result;
- UWORD code;
-
- /* Obtain the window wait signal mask.
- */
- GetAttr(WINDOW_SigMask, objects[OID_MAIN], &signal);
-
- /* Input Event Loop
- */
- while (!done)
- {
- wait = Wait( signal | SIGBREAKF_CTRL_C | app );
-
- if ( wait & SIGBREAKF_CTRL_C )
- {
- done = TRUE;
- }
- else
- {
- while ( (result = CA_HandleInput(objects[OID_MAIN], &code) ) != WMHI_LASTMSG )
- {
- switch (result & WMHI_CLASSMASK)
- {
- case WMHI_CLOSEWINDOW:
- windows[WID_MAIN] = NULL;
- done = TRUE;
- break;
-
- case WMHI_GADGETUP:
- switch (result & WMHI_GADGETMASK)
- {
- case GID_DOWN:
- {
- int i;
-
- SetAttrs(objects[OID_MAIN], WA_BusyPointer, TRUE);
-
- for( i = FMAX; i >= FMIN; i -= 5 )
- {
- SetGadgetAttrs(
- gadgets[GID_GAUGE],
- windows[WID_MAIN], NULL,
- FUELGAUGE_Level, i, TAG_DONE);
- Delay(3);
- }
-
- SetAttrs(objects[OID_MAIN], WA_BusyPointer, FALSE);
- ;
- }
- break;
-
- case GID_UP:
- {
- int i;
-
- SetAttrs(objects[OID_MAIN], WA_BusyPointer, TRUE);
-
- for( i = FMIN; i <= FMAX; i += 5 )
- {
- SetGadgetAttrs(
- gadgets[GID_GAUGE],
- windows[WID_MAIN], NULL,
- FUELGAUGE_Level, i, TAG_DONE);
- Delay(3);
- }
-
- SetAttrs(objects[OID_MAIN], WA_BusyPointer, FALSE);
- }
- break;
-
- case GID_QUIT:
- done = TRUE;
- break;
- }
- break;
-
- case WMHI_ICONIFY:
- CA_Iconify(objects[OID_MAIN]);
- windows[WID_MAIN] = NULL;
- break;
-
- case WMHI_UNICONIFY:
- windows[WID_MAIN] = (struct Window *) CA_OpenWindow(objects[OID_MAIN]);
-
- if (windows[WID_MAIN])
- {
- GetAttr(WINDOW_SigMask, objects[OID_MAIN], &signal);
- }
- else
- {
- done = TRUE; // error re-opening window!
- }
- break;
- }
- }
- }
- }
- }
-
- /* Disposing of the window object will also close the window if it is
- * already opened, and it will dispose of the layout object attached to it.
- */
- DisposeObject(objects[OID_MAIN]);
- }
-
- DeleteMsgPort(AppPort);
- }
-
- return(0);
- }
-